home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Ahoy 1986 June
/
Ahoy_Magazine_86-06_1986_Double_L.d64
/
trackdown 64
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
909b
|
20 lines
10 rem *** trackdown (64) *** buck childress (11/07/85) ***
20 rem *** p.o. box 13575 salem, or 97309 ***
30 printchr$(147)"loading and checking data.":print
40 forj=53000to53157:reada:pokej,a:x=x+a:nextj
50 ifx<>24385thenprint"error in data.":end
60 print"data ok.":print:print"sys 53000 to activate.":end
70 data162,0,172,1,8,200,200,132,253,169,8,133
80 data254,161,253,141,166,207,230,253,161,253,141,167
90 data207,230,253,169,5,141,168,207,169,8,133,252
100 data162,0,173,168,207,133,251,173,168,207,197,251
110 data208,22,201,6,240,18,161,251,201,34,240,4
120 data201,35,208,8,169,6,141,168,207,76,44,207
130 data161,253,240,7,193,251,240,39,76,153,207,161
140 data251,240,44,32,159,207,32,159,207,161,253,240
150 data60,32,159,207,161,253,141,166,207,32,159,207
160 data161,253,141,167,207,32,159,207,76,44,207,230
170 data251,161,251,240,6,32,159,207,76,51,207,174
180 data166,207,173,167,207,32,205,189,169,13,32,210
190 data255,32,159,207,76,44,207,230,253,208,2,230,254,96